//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <tchar.h>
//---------------------------------------------------------------------------
USEFORM("MainForm.cpp", MF);
USEFORM("SettingsForm.cpp", SF);
USEFORM("ColorArcForm.cpp", CAF);
USEFORM("HelpForm.cpp", HF);
USEFORM("ColorMarksForm.cpp", CMF);
USEFORM("ColorForm.cpp", CF);
//---------------------------------------------------------------------------
WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int) {
	try {
		Application->Initialize();
		Application->MainFormOnTaskBar = true;
		Application->Title = "Colored PetryNet ver 2.0";
		Application->CreateForm(__classid(TMF), &MF);
		Application->CreateForm(__classid(TSF), &SF);
		Application->CreateForm(__classid(THF), &HF);
		Application->CreateForm(__classid(TCF), &CF);
		Application->CreateForm(__classid(TCMF), &CMF);
		Application->CreateForm(__classid(TCAF), &CAF);
		Application->Run();
	}
	catch (Exception &exception) {
		Application->ShowException(&exception);
	}
	catch (...) {
		try {
			throw Exception("");
		}
		catch (Exception &exception) {
			Application->ShowException(&exception);
		}
	}
	return 0;
}
//---------------------------------------------------------------------------
